home *** CD-ROM | disk | FTP | other *** search
- ////////////////////\\\\\\\\\\\\\\\\\\\\\\\\
- Dokumentation zu FIDO Unit FCONFIG
- \\\\\\\\\\\\\\\\\\\\////////////////////////
-
- Release 1.00
- ^^^^^^^^^^^^
-
- ========================================================================
- Autor: Matthias Tichy, 2:2440/210.14 @ Classic, Düsseldorf 15.08.1994
- 2:2433/920.14 @ Lite
- ========================================================================
-
- 1. Config:
- ------------
- Die Unit FConfig.pas stellt Ihnen Routinen zur Verfügung mit denen
- Config-Files gelesen werden können. Diese Config-Files sehen z.B. so
- aus :
-
- -----aha.cfg------
- ; Dies ist ein Kommentar
- Adress 2:2440/210.14 ; hier geben sie ihre Fido-Adresse an
- Adress 100:494/300.18
- [...]
-
- Beispiele dieser Config-Files finden sie bei den Programmen xOR &
- REQMAN, wobei letzteres mit dieser Unit arbeitet.
-
- 2. Kurbeschreibung:
- -------------------
-
- CFirst .......... Kann in ReadEntry statt true zur Übersichtlichkeit
- eingesetzt werden
- CNext ........... " statt false
- PConfig ......... Ist ein Record der eine verkettete Liste beginnt
-
- LoadConfig ...... Lädt ein Config-File in den Speicher
- ReadEntry ....... Sucht einen Entry in der Liste
- DisposeConfig ... Gibt den Speicher des Config-Files frei
-
- 3. Detaillierte Beschreibung:
- -----------------------------
-
- ===============================================================
- LoadConfig
- ---------------------------------------------------------------
- ERSTDATUM ... 23.11.1994 LETZTE ÄNDERUNG ... 30.11.1994
-
- MODIFIKATION ...
- ---------------------------------------------------------------
-
- BESCHREIBUNG ... Liest ein Config-File in den Speicher ein.
-
- DEKLARATION ... LoadConfig(name : string) : PConfig;
-
- PARAMETER ... name : Name des Config-Files xxxxxxxx.xxx
-
- ERGEBNIS ... PConfig : Pointer auf verkettete Liste, die
- die Anderen Routinen benutzen.
-
- ===============================================================
- ReadEntry
- ---------------------------------------------------------------
- ERSTDATUM ... 23.11.1994 LETZTE ÄNDERUNG ... 30.11.1994
-
- MODIFIKATION ...
- ---------------------------------------------------------------
-
- BESCHREIBUNG ... ReadEntry sucht in der übergebenen Liste nach
- einem Entry und speichert diesen in entry.
- ReadEntry liefert den String der im Config-File
- steht _ohne_ den Entry-Namen zurück.
-
- DEKLARATION ... readEntry(var entry : string;Conf : PConfig;first : boolean) : Integer;
-
- PARAMETER ... entry : Entry nach dem gesucht wird. Suche ist
- case-INsensitive
- Conf : Pointer auf Liste in der gesucht werden soll
- dadurch ist es möglich mehrere Listen gleich-
- zeitig im Speicher zu halten.
- first : true - Es wird von Anfang der Liste gesucht.
- false - Es wird das nächste Element gesucht
- trotzdem muß Entry neu gesetzt werden.
-
- ERGEBNIS ... Entry : enthält den String nach entry-name im
- config-File.
- Integer : bei 0 alles o.k.
- bei -1 den Entry nicht gefunden.
-
- ===============================================================
- DisposeConfig
- ---------------------------------------------------------------
- ERSTDATUM ... 23.11.1994 LETZTE ÄNDERUNG ... 30.11.1994
-
- MODIFIKATION ...
- ---------------------------------------------------------------
-
- BESCHREIBUNG ... Löscht die Liste aus dem Speicher.
-
- DEKLARATION ... DisposeConfig(var conf : PConfig);
-
- PARAMETER ... conf : Config-Liste, die aus dem Speicher gelöscht
- werden soll.
-
- ERGEBNIS ... keine
-
- 4. Beispiele:
- -------------
- ===============================================================
- LoadConfig, ReadEntry, DisposeConfig
- ---------------------------------------------------------------
-
- -----aha.cfg------
- ; Dies ist ein Kommentar
- Adress 2:2440/210.14 ; hier geben sie ihre Fido-Adresse an
- Adress 100:494/300.18
- [...]
-
- var
- Conf : PConfig;
- entry : string;
-
- begin
- Conf := loadConfig('aha.cfg');
- entry := 'Adress';
- if ReadEntry(entry, conf, CFirst) = 0 then
- writeln('MAIN AKA > ', entry)
- else writeln('Entry Adress fehlt im Config-File!');
- Entry := 'Adress';
- while ReadEntry(entry, conf, CFirst) = 0 do
- begin
- writeln('AKA > ', entry);
- Entry := 'Adress';
- end;
- DisposeConfig(Conf);
- end;
-
- 5. History:
- -----------
-
- Neuerungen nach Release ...
- ---------------------------
- Noch nischts :-)
-
- ========================================================================
-
- /////////////////////\\\\\\\\\\\\\\\\\\\\\\\\
- Ende der Dokumentation zur FIDO Unit FCONFIG
- \\\\\\\\\\\\\\\\\\\\\////////////////////////